perm filename BUG.PPR[W82,JMC] blob
sn#632550 filedate 1982-01-10 generic text, type T, neo UTF8
Is the following a bug? If not how do I get use an axiom ¬p to get
if p then a else b = b?
the proof BUG:
(DECL (P) |TRUTHVAL| CONSTANT)
(DECL (A B) |GROUND| CONSTANT)
(ASSUME |¬P|)
3. ¬P
ctxt: (1) deps: (3)
(TRW |IF P THEN A ELSE B| |*3*NIL|)
4. IF P THEN A ELSE B=IF P THEN A ELSE B
ctxt: (1 2) deps: (3)
(ASSUME |P|)
5. P
ctxt: (1) deps: (5)
(TRW |IF P THEN A ELSE B| |*5*NIL|)
6. IF P THEN A ELSE B=A
ctxt: (1 2) deps: (5)